home *** CD-ROM | disk | FTP | other *** search
/ Aminet 12 / Aminet 12 (1996)(GTI - Schatztruhe)[!][Jun 1996].iso / Aminet / biz / demo / refdemo1.lha / Ref3install < prev    next >
Text File  |  1996-01-15  |  8KB  |  229 lines
  1. ; $VER:Reflections 3.06 Demo Installscript v1.0 (15.1.1996)
  2. ; written 1996 by Helmut Eisenkolb and Carsten Lotz for Oberland, Kronberg
  3.  
  4.  
  5. (set @minuser "average")
  6. (set @appname "Reflection 3.0 Demo")
  7. (set @language "deutsch")
  8.  
  9. (set kickversion (/ (getversion "libs:version.library") 65536))
  10.  
  11. (if (=  (exists "T:" (noreq)) 0) ((makedir "RAM:T" (safe))
  12.                                   (makeassign "T" "RAM:T" (safe))
  13.                                  )
  14. )
  15.  
  16. (complete 0)
  17.  
  18. (welcome "Willkommen bei Reflection 3.0 Demo Amiga!\n")
  19.  
  20. (message "\nReflections 3.0 Demo Installation v1.0 (15.1.1996)\n\n"
  21.          "Im Folgenden wird Reflections 3.0 Demo auf Ihrem Amiga "
  22.          "installiert.\n\n"
  23.          "©1996 by Oberland - alle Rechte vorbehalten.\n\n\n\n"
  24.     "Installer © Amiga Technologies GmbH"
  25. )
  26.  
  27. (set modus 1)
  28.  
  29. (if (AND (= (exists "REF3:" (noreq)) 2) (= (exists "REF3:ref3" (noreq)) 1) )
  30.    (set modus (askchoice (prompt "Das Installationsprogramm hat auf Ihrem Rechner unter"
  31.                          " der Zuweisung REF3: eine bereits installierte Version"
  32.                          " von Reflections gefunden. Soll diese Version ersetzt werden?")
  33.                       (help (cat "\nWenn Sie \"Version ersetzen\" auswählen, werden nur"
  34.                          " die Programmdateien und Config-Files Ihrer bereits"
  35.                               " installierten Reflections-Version überschrieben.\n"
  36.                          "Die Datei Ref3.CFG wird unter Ref3.OLD gesichert.\n\n"
  37.                          "Falls Sie sich für eine Neuinstallation entscheiden,"
  38.                          " sollten Sie die alte Zuweisung für REF3: aus Ihrer Datei"
  39.                          " s:user-startup entfernen.\n\n"))
  40.                       (choices "Version ersetzen" "Neuinstallation"))
  41.    )
  42. )
  43.  
  44. (if (= modus 1) (
  45.    (set ziel (askdir (prompt "Wo soll eine neue Schublade für\n"
  46.                                    "Reflections 3.0 Demo erstellt werden?")
  47.                            (help (cat "\nHier wählen Sie bitte den Pfad aus, wo"
  48.                                       " eine neue Schublade erstellt wird, in"
  49.                                       " der alle zu Reflections 3.0 Demo gehörigen"
  50.                                       " Programmteile und Daten installiert werden"
  51.                                       " sollen.\n\n"
  52.                                       "Die Schublade wird vom Installationsprogramm"
  53.                                       " automatisch angelegt, Sie brauchen sie nicht"
  54.                                       " in Ihrer Auswahl mit anzugeben.\n\n"
  55.                                       "Der Name der Schublade wird im nächsten"
  56.                                       " Installationsschritt von Ihnen erfragt."))
  57.                            (default @default-dest)
  58.                    )
  59.    )
  60.  
  61.    (set @default-dest ziel)
  62.  
  63.    (set schubname (askstring (prompt "\nWie soll die neue Schublade für\n"
  64.                                      "Reflections 3.0 Demo heissen?")
  65.                              (help (cat "\nHier geben Sie bitte den Namen der Schublade an,"
  66.                                         " die vom Installationsprogramm neu erstellt wird."))
  67.                                 (default "Reflections v3")
  68.                   )
  69.    )
  70.  
  71.    (set pfad (tackon ziel schubname))
  72.    (makedir pfad (infos))
  73.    (makeassign "REF3" pfad)
  74. ))
  75.  
  76. (if (= modus 0) (
  77.    (set pfad "REF3:")
  78.    (set @default-dest "REF3:")
  79.  
  80.    (if(= (exists "REF3:Anims" (noreq)) 2) (
  81.       (rename "REF3:Anims" "REF3:Anim")
  82.       (rename "REF3:Anims.info" "REF3:Anim.info")
  83.    ))
  84.    (if(= (exists "REF3:Ref3.CFG" (noreq)) 1) (
  85.       (delete "REF3:Ref3.OLD")
  86.       (rename "REF3:Ref3.CFG" "REF3:Ref3.OLD")
  87.    ))
  88. ))
  89.  
  90. (delete "REF3:ERRORMSG")
  91.  
  92. (complete 1)
  93.  
  94. (if (= modus 0)
  95.    (message "\nDie Reflections - Programmdateien werden nun auf Version 3.0 Demo aktualisiert.\n")
  96.    (message "\nDie Reflections 3.0 Demo - Programmdateien werden jetzt installiert.\n")
  97. )
  98.  
  99. (copyfiles (source "Demo1:lhex") (dest "T:"))
  100. (working "\nErstellen der Reflections - Unterverzeichnisse...")
  101. (run "T:lhex -fwREF3: x Demo1:main.lha")
  102.  
  103. (makedir (tackon pfad "Material") (infos))
  104. (makedir (tackon pfad "Szenen") (infos))
  105. (makedir (tackon pfad "Textur") (infos))
  106. (makedir (tackon pfad "Fonts3D") (infos))
  107. (makedir (tackon pfad "Hilfe") (infos))
  108. (makedir (tackon pfad "Anim") (infos))
  109. (makedir (tackon pfad "Bild") (infos))
  110.  
  111. (complete 3)
  112.  
  113. (if (= modus 1) (
  114.    (working "\nEntpacken der Zubehördateien...")
  115.    (run "T:lhex -fwREF3:Fonts3d/ x Demo1:fonts3d.lha")
  116.    (complete 8)
  117.    (run "T:lhex -fwREF3:Hilfe/ x Demo1:hilfe.lha")
  118.    (complete 15)
  119.    (run "T:lhex -fwREF3:Material/ x Demo1:material.lha")
  120.    (complete 20)
  121.    (run "T:lhex -fwREF3:Szenen/ x Demo1:szenen.lha")
  122.    (complete 28)
  123.    (run "T:lhex -fwREF3:Textur/ x Demo1:textur.lha")
  124. ))
  125.  
  126. (complete 35)
  127.  
  128. (askdisk (prompt "\nBitte Disk 2 einlegen")
  129.        (help "\nBitte die 2. Diskette einlegen !!!")
  130.        (dest "Demo2"))
  131.        (working "\nEntpacken der Reflections Demoversion...")
  132.    (run "T:lhex -fwREF3: x Demo2:Demo.lha")
  133.  
  134.  
  135. (complete 90)
  136.  
  137.  
  138. (complete 95)
  139.  
  140.  
  141. (set display (askchoice (prompt "\nAuf welchem Screen soll Reflections arbeiten:\n")
  142.          (help "\nDie hier vorgegebenen Auflösungen werden am häufigsten "
  143.                "verwendet. Wenn Sie z.B. eine Grafikkarte besitzen, "
  144.                "können Sie die gewünschte Auflösung in der Datei "
  145.                "Ref3.CFG selbst eintragen.\n"
  146.                "PalHires Interlace mit 8 Farben ist auf allen Amigas möglich, "
  147.                "SuperHires benötigt das AGA-Chipset. Die Auflösung "
  148.                "1024 x 768 ist nur mit Grafikkarten darstellbar.")
  149.          (choices "Workbench-Screen" "640x512 PAL Hires Interlace, 8 Farben"
  150.              "800x600 AGA SuperHires Interlace, 32 Farben" "1024x768 mit Grafikkarte, 256 Farben")
  151.         )
  152. )
  153.  
  154. (complete 96)
  155.  
  156. (if (= art 0)
  157.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:cfg1") (append "MAX_LIST 15\n\n\n"))
  158. )
  159. (if (= art 1)
  160.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:cfg1") (append "MAX_LIST 30\n\n\n"))
  161. )
  162. (if (> display 0)
  163.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  164.       (append ";   =================\n;    Bildschirmmodus\n;   =================\n\n")
  165.    )
  166. )
  167. (if (= display 1)
  168.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  169.       (append "DISPLAY 640 512 3\n\n")
  170.    )
  171. )
  172. (if (= display 2)
  173.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  174.       (append "DISPLAY 800 600 5\n\n")
  175.    )
  176. )
  177. (if (= display 3)
  178.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  179.       (append "DISPLAY 1024 768 8\n\n")
  180.    )
  181. )
  182.  
  183. (complete 97)
  184.  
  185. (if (= (askbool (prompt "\nWollen Sie einen externen RGB-Viewer einbinden?")
  186.       (help "\nHier können Sie ein externes Programm z.B. von Ihrer "
  187.             "Grafikkarte auswählen, um Bilder zu betrachten.")
  188.       (choices "Ja" "Nein")
  189.        ) 1)
  190.    (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  191.       (append (cat ";   =============\n;    Grafikkarte\n;   =============\n\nRGB_VIEWER "
  192.               (askfile (prompt "Bitte Wählen Sie das RGB-Viewer Programm:")
  193.             (help "\nHier wählen Sie nun die Programm-Datei, die gestartet "
  194.                   "wird, wenn Sie RGB-Bilder betrachten wollen.")
  195.             (default "SYS:")
  196.               )
  197.               "\n\n"
  198.          )
  199.       )
  200.    )
  201. )
  202.  
  203. (complete 98)
  204.  
  205. (delete "REF3:cfg1")
  206. (delete "T:lhex")
  207.  
  208. (complete 99)
  209.  
  210. (if (= modus 1) (
  211.     (run "echo >>s:user-startup")
  212.         (textfile (prompt "\nReflections benötigt die Zuweisung REF3:\n"
  213.                      "Soll das Installationsprogramm die Zeile\n\n"
  214.                      "ASSIGN REF3: \"" pfad "\"\n\n an die Datei s:user-startup"
  215.                      " anfügen?")
  216.              (help (cat "\nDas Installationsprogramm fügt an dieser Stelle die Zuweisung"
  217.                         " REF3: in die Datei s:user-startup ein.\nWenn Sie diese Aktion"
  218.                         " jetzt nicht bestätigen, müssen Sie später selbst die Zeile\n"
  219.                         " \nASSIGN REF3: \"" pfad "\"\n\nin die User-Startup Datei einfügen."))
  220.              (dest "s:user-startup")
  221.              (include "s:user-startup")
  222.              (append (cat "\n;BEGIN Reflections 3.0 Demo\nASSIGN REF3: \"" pfad
  223.                           "\"\n;END Reflections 3.0 Demo\n\n"))
  224.              (confirm average)
  225.        )
  226. ))
  227.  
  228. (complete 100)
  229.